use strict;
use Test::More tests => 5;

BEGIN { use_ok( 'WWW::VKontakte::API' ); }

my $vk = new_ok( 'WWW::VKontakte::API' => [{ email => 'EtkacGocHi@mail.com', password => 'vicEtyehav' }] );

is( $vk->email, 'EtkacGocHi@mail.com', 'email' );
is( $vk->password, 'vicEtyehav', 'password' );
ok( $vk->logout, 'logout test (needs an internet connection!)' );

